home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The CICA Windows Explosion!
/
The CICA Windows Explosion! - Disc 2.iso
/
nt
/
we32i30d.zip
/
MACRO.MN_
< prev
next >
Wrap
Text File
|
1993-08-08
|
2KB
|
65 lines
;
; WinEdit Script for Macro Menu
;
; WinEdit Pro records macros as WIL scripts. After recording a macro,
; save the resulting script as MACROx.MAC, where x is a digit from 0 to 9.
; This menu script will then be able to play back the recorded macro with
; a Control+digit hotkey.
;
; You can edit the names which appear on the macro menu by editing this
; script. You can also call any other WIL scripts as macros by
; editing the filename used for the call().
Record Macro \ ^R ; Start or Stop recording a macro
wRecord()
_&1. Macro 1 \ ^1 ; Play back Macro 1
TheFile=strcat(DirHome(),"MACRO1.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&2. Macro 2 \ ^2 ; Play back Macro 2
TheFile=strcat(DirHome(),"MACRO2.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&3. Macro 3 \ ^3 ; Play back Macro 3
TheFile=strcat(DirHome(),"MACRO3.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&4. Macro 4 \ ^4 ; Play back Macro 4
TheFile=strcat(DirHome(),"MACRO4.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&5. Macro 5 \ ^5 ; Play back Macro 5
TheFile=strcat(DirHome(),"MACRO5.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&6. Macro 6 \ ^6 ; Play back Macro 6
TheFile=strcat(DirHome(),"MACRO6.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&7. Macro 7 \ ^7 ; Play back Macro 7
TheFile=strcat(DirHome(),"MACRO7.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&8. Macro 8 \ ^8 ; Play back Macro 8
TheFile=strcat(DirHome(),"MACRO8.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
&9. Macro 9 \ ^9 ; Play back Macro 9
TheFile=strcat(DirHome(),"MACRO9.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)
1&0. Macro 10 \ ^0 ; Play back Macro 10
TheFile=strcat(DirHome(),"MACRO0.MAC")
if FileExist(TheFile) then call(TheFile,"")
Drop(TheFile)